类 启动窗口 : 窗口

	@布局配置([[根布局=真,宽度=-1,高度=-1]])
	变量 自适应布局1 : 自适应布局
	@布局配置([[父布局=自适应布局1]])
	变量 文本框1 : 文本框
	
	变量 线程1 : 线程
	
    事件 启动窗口:创建完毕()
		订阅事件()
        线程1.启动()
    结束 事件

	事件 线程1:被启动()
		循环(i, 0, 20)
			延时(500)
			线程1.通知_更新主线程()
		结束 循环
	结束 事件

	事件 线程1:更新主线程(来源消息 : 消息)
		文本框1.内容 = 文本框1.内容 + "A"
	结束 事件
结束 类